home *** CD-ROM | disk | FTP | other *** search
/ Languguage OS 2 / Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO / gnu / recode.lha / recode-3.2.4 / ascitxte.l < prev    next >
Text File  |  1992-08-19  |  1KB  |  35 lines
  1. %{
  2. /* Conversion of files between different charsets and usages.
  3.    Copyright (C) 1990 Free Software Foundation, Inc.
  4.    Francois Pinard <pinard@iro.umontreal.ca>, 1988.
  5.  
  6.    This program is free software; you can redistribute it and/or modify
  7.    it under the terms of the GNU General Public License as published by
  8.    the Free Software Foundation; either version 2, or (at your option)
  9.    any later version.
  10.  
  11.    This program is distributed in the hope that it will be useful, but
  12.    WITHOUT ANY WARRANTY; without even the implied warranty of
  13.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14.    General Public License for more details.
  15.  
  16.    You should have received a copy of the GNU General Public License
  17.    along with this program; if not, write to the Free Software
  18.    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  19. */
  20.  
  21. #define STEP    ascii_texte
  22.  
  23. extern char diaeresis_char;    /* Character for diaeresis */
  24. %}
  25.  
  26. %%
  27. \"\b\<|\<\b\"        { output ('`'); output ('`'); }
  28. \"\b\>|\>\b\"        { output ('\''); output ('\''); }
  29.  
  30. ['`^,]\b.        { output (yytext[2]); output (yytext[0]); }
  31. .\b['`^,]        { output (yytext[0]); output (yytext[2]); }
  32.  
  33. \"\b.            { output (yytext[2]); output (diaeresis_char); }
  34. .\b\"            { output (yytext[0]); output (diaeresis_char); }
  35.